5 CK=0
10 FOR B=49152 TO 49208:READ A:CK=CK+A:POKEB,A:NEXT
12 IF CK<>6273 THEN PRINT"ERROR IN DATA":END
14 SYS 49152
16 DATA 169,1,141,5,220,160,0,173,162,0,153,0,4,153,0,5,153,0,6,153,0,7,200,208
18 DATA 238,160,0,173,162,0,153,0,216,153,0,217,153,0,218,153,0,219,200,208,238
20 DATA 169,0,141,33,208,141,32,208,76,0,192,139